home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 5 / Amiga Tools 5.iso / tools / dfÜ / bbs / tronbbs / tron / menus / readmsgs.src < prev    next >
Text File  |  1996-07-16  |  1KB  |  85 lines
  1.  
  2. ; Menu to select a methode of reading messages
  3.  
  4. Menu "ReadMsgs.menu"
  5.  
  6. flags  hotkeyable
  7. level  0 - 255 , "ReadMsgs.Ansi"
  8. prompt 0 , 0 - 255 , "|Read Menu : "
  9. prompt 1 , 0 - 255 , "|Read Menu : "
  10.  
  11. BEGIN     ; Start the command definitions
  12.  
  13.  
  14. Cmd "N"
  15.    ReadNew
  16.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  17. EndCmd
  18.  
  19. Cmd "F"
  20.    ReadForward
  21.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  22. EndCmd
  23.  
  24. Cmd "R"
  25.    ReadReverse
  26.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  27. EndCmd
  28.  
  29. Cmd "1"
  30.    ReadToUser
  31.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  32. EndCmd
  33.  
  34. Cmd "2"
  35.    ReadFromUser
  36.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  37. EndCmd
  38.  
  39. Cmd "3"
  40.    ReadToFromUser
  41.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  42. EndCmd
  43.  
  44. Cmd "4"
  45.    ReadSubject
  46.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  47. EndCmd
  48.  
  49. Cmd "5"
  50.    ReadToFromSubject
  51.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  52. EndCmd
  53.  
  54.  
  55. Cmd "Z" , 0-255
  56.    ReadGlobalNew
  57.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  58. EndCmd
  59.  
  60. Cmd "W" , 0-255
  61.    ReadWaitingMail
  62.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  63. EndCmd
  64.  
  65. Cmd "M" , 0-255
  66.    ReadMarkedMessages
  67.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  68. EndCmd
  69.  
  70.  
  71.  
  72.  
  73. Cmd ""
  74.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  75. EndCmd
  76.  
  77.  
  78. Cmd "Q"
  79.    PreviousMenu                ;   GotoMenu "Mail.Menu"
  80. EndCmd
  81.  
  82.  
  83. END
  84.  
  85.